// starting begin ; disable ( 101 ) ;
   0: LD_INT 101
   2: DISABLE_MARKED
// PrepareHero1 ;
   3: CALL 1808 0 0
// LoadVehicles ;
   7: CALL 4630 0 0
// InGameOn ;
  11: CALL_OW 8
// SayRadio ( PULK_02 , A1 ) ;
  15: LD_EXP 20
  19: PPUSH
  20: LD_STRING A1
  22: PPUSH
  23: CALL_OW 94
// SayRadio ( OWChyba , A2 ) ;
  27: LD_EXP 19
  31: PPUSH
  32: LD_STRING A2
  34: PPUSH
  35: CALL_OW 94
// SayRadio ( PULK_02 , A3 ) ;
  39: LD_EXP 20
  43: PPUSH
  44: LD_STRING A3
  46: PPUSH
  47: CALL_OW 94
// SayRadio ( OWChyba , A4 ) ;
  51: LD_EXP 19
  55: PPUSH
  56: LD_STRING A4
  58: PPUSH
  59: CALL_OW 94
// SayRadio ( PULK_02 , A5 ) ;
  63: LD_EXP 20
  67: PPUSH
  68: LD_STRING A5
  70: PPUSH
  71: CALL_OW 94
// SayRadio ( OWChyba , A6 ) ;
  75: LD_EXP 19
  79: PPUSH
  80: LD_STRING A6
  82: PPUSH
  83: CALL_OW 94
// SayRadio ( PULK_02 , A7 ) ;
  87: LD_EXP 20
  91: PPUSH
  92: LD_STRING A7
  94: PPUSH
  95: CALL_OW 94
// SayRadio ( OWChyba , A8 ) ;
  99: LD_EXP 19
 103: PPUSH
 104: LD_STRING A8
 106: PPUSH
 107: CALL_OW 94
// SayRadio ( PULK_02 , A9 ) ;
 111: LD_EXP 20
 115: PPUSH
 116: LD_STRING A9
 118: PPUSH
 119: CALL_OW 94
// SayRadio ( OWChyba , A10 ) ;
 123: LD_EXP 19
 127: PPUSH
 128: LD_STRING A10
 130: PPUSH
 131: CALL_OW 94
// SayRadio ( PULK_02 , A11 ) ;
 135: LD_EXP 20
 139: PPUSH
 140: LD_STRING A11
 142: PPUSH
 143: CALL_OW 94
// SayRadio ( PULK_02 , A12 ) ;
 147: LD_EXP 20
 151: PPUSH
 152: LD_STRING A12
 154: PPUSH
 155: CALL_OW 94
// SayRadio ( OWChyba , A13 ) ;
 159: LD_EXP 19
 163: PPUSH
 164: LD_STRING A13
 166: PPUSH
 167: CALL_OW 94
// InGameOff ;
 171: CALL_OW 9
// SetAreaMapShow ( Area19 , 1 ) ;
 175: LD_INT 7
 177: PPUSH
 178: LD_INT 1
 180: PPUSH
 181: CALL_OW 424
// ChangeMissionObjectives ( M1 ) ;
 185: LD_STRING M1
 187: PPUSH
 188: CALL_OW 337
// SaveForQuickRestart ;
 192: CALL_OW 22
// end ;
 196: END
// every 0 0$01 trigger IsInArea ( OWChyba , Area19 ) do
 197: LD_EXP 19
 201: PPUSH
 202: LD_INT 7
 204: PPUSH
 205: CALL_OW 308
 209: IFFALSE 587
 211: GO 213
 213: DISABLE
// begin SetAreaMapShow ( Area19 , 0 ) ;
 214: LD_INT 7
 216: PPUSH
 217: LD_INT 0
 219: PPUSH
 220: CALL_OW 424
// wait ( 2 2$30 ) ;
 224: LD_INT 5250
 226: PPUSH
 227: CALL_OW 67
// wsparcie1 ;
 231: CALL 2705 0 0
// SayRadio ( PULK_02 , A14 ) ;
 235: LD_EXP 20
 239: PPUSH
 240: LD_STRING A14
 242: PPUSH
 243: CALL_OW 94
// wait ( 1 1$30 ) ;
 247: LD_INT 3150
 249: PPUSH
 250: CALL_OW 67
// Say ( W3 , A14a ) ;
 254: LD_EXP 61
 258: PPUSH
 259: LD_STRING A14a
 261: PPUSH
 262: CALL_OW 88
// Say ( OWChyba , A14b ) ;
 266: LD_EXP 19
 270: PPUSH
 271: LD_STRING A14b
 273: PPUSH
 274: CALL_OW 88
// ChangeMissionObjectives ( M2 ) ;
 278: LD_STRING M2
 280: PPUSH
 281: CALL_OW 337
// wait ( 3 3$00 ) ;
 285: LD_INT 6300
 287: PPUSH
 288: CALL_OW 67
// wsparcie2 ;
 292: CALL 2976 0 0
// wait ( 2 2$00 ) ;
 296: LD_INT 4200
 298: PPUSH
 299: CALL_OW 67
// atak3 ;
 303: CALL 1133 0 0
// atak4 ;
 307: CALL 1003 0 0
// atak_1 ;
 311: CALL 1263 0 0
// atak3 ;
 315: CALL 1133 0 0
// wait ( 3 3$30 ) ;
 319: LD_INT 7350
 321: PPUSH
 322: CALL_OW 67
// atak1 ;
 326: CALL 588 0 0
// atak_1 ;
 330: CALL 1263 0 0
// atak4 ;
 334: CALL 1003 0 0
// atak_3 ;
 338: CALL 1678 0 0
// wait ( 1 1$30 ) ;
 342: LD_INT 3150
 344: PPUSH
 345: CALL_OW 67
// wsparcie3 ;
 349: CALL 3268 0 0
// SayRadio ( PULK_02 , A15 ) ;
 353: LD_EXP 20
 357: PPUSH
 358: LD_STRING A15
 360: PPUSH
 361: CALL_OW 94
// wait ( 2 2$30 ) ;
 365: LD_INT 5250
 367: PPUSH
 368: CALL_OW 67
// atak_2 ;
 372: CALL 1548 0 0
// atak_2 ;
 376: CALL 1548 0 0
// atak2 ;
 380: CALL 873 0 0
// atak4 ;
 384: CALL 1003 0 0
// wait ( 4 4$30 ) ;
 388: LD_INT 9450
 390: PPUSH
 391: CALL_OW 67
// wsparcie4 ;
 395: CALL 3678 0 0
// wait ( 1 1$30 ) ;
 399: LD_INT 3150
 401: PPUSH
 402: CALL_OW 67
// atak_1 ;
 406: CALL 1263 0 0
// atak_1 ;
 410: CALL 1263 0 0
// atak1 ;
 414: CALL 588 0 0
// atak2 ;
 418: CALL 873 0 0
// atak3 ;
 422: CALL 1133 0 0
// atak3 ;
 426: CALL 1133 0 0
// wait ( 3 3$00 ) ;
 430: LD_INT 6300
 432: PPUSH
 433: CALL_OW 67
// atak2 ;
 437: CALL 873 0 0
// atak2 ;
 441: CALL 873 0 0
// atak3 ;
 445: CALL 1133 0 0
// atak4 ;
 449: CALL 1003 0 0
// atak_1 ;
 453: CALL 1263 0 0
// atak2 ;
 457: CALL 873 0 0
// atak3 ;
 461: CALL 1133 0 0
// wait ( 2 2$30 ) ;
 465: LD_INT 5250
 467: PPUSH
 468: CALL_OW 67
// atak_2 ;
 472: CALL 1548 0 0
// atak_2 ;
 476: CALL 1548 0 0
// atak_3 ;
 480: CALL 1678 0 0
// atak_3 ;
 484: CALL 1678 0 0
// atak_1 ;
 488: CALL 1263 0 0
// atak1 ;
 492: CALL 588 0 0
// atak1 ;
 496: CALL 588 0 0
// atak1 ;
 500: CALL 588 0 0
// atak3 ;
 504: CALL 1133 0 0
// atak3 ;
 508: CALL 1133 0 0
// wait ( 3 3$00 ) ;
 512: LD_INT 6300
 514: PPUSH
 515: CALL_OW 67
// SayRadio ( PULK_02 , A17 ) ;
 519: LD_EXP 20
 523: PPUSH
 524: LD_STRING A17
 526: PPUSH
 527: CALL_OW 94
// SayRadio ( OWChyba , A18 ) ;
 531: LD_EXP 19
 535: PPUSH
 536: LD_STRING A18
 538: PPUSH
 539: CALL_OW 94
// SayRadio ( PULK_02 , A19 ) ;
 543: LD_EXP 20
 547: PPUSH
 548: LD_STRING A19
 550: PPUSH
 551: CALL_OW 94
// SayRadio ( OWChyba , A20 ) ;
 555: LD_EXP 19
 559: PPUSH
 560: LD_STRING A20
 562: PPUSH
 563: CALL_OW 94
// SaveCharacters ( OWChyba , OWChyba ) ;
 567: LD_EXP 19
 571: PPUSH
 572: LD_STRING OWChyba
 574: PPUSH
 575: CALL_OW 38
// medale ;
 579: CALL 4185 0 0
// youwin ;
 583: CALL_OW 103
// end ; end_of_file
 587: END
// export A1 , A2 , A3 , A4 ; export function ATAK1 ; var level ; begin
 588: LD_INT 0
 590: PPUSH
 591: PPUSH
// level = [ 5 , 6 , 6 ] [ Difficulty ] ;
 592: LD_ADDR_VAR 0 2
 596: PUSH
 597: LD_INT 5
 599: PUSH
 600: LD_INT 6
 602: PUSH
 603: LD_INT 6
 605: PUSH
 606: EMPTY
 607: LIST
 608: LIST
 609: LIST
 610: PUSH
 611: LD_OWVAR 67
 615: ARRAY
 616: ST_TO_ADDR
// vc_chassis = 22 ;
 617: LD_ADDR_OWVAR 37
 621: PUSH
 622: LD_INT 22
 624: ST_TO_ADDR
// vc_engine = engine_combustion ;
 625: LD_ADDR_OWVAR 39
 629: PUSH
 630: LD_INT 1
 632: ST_TO_ADDR
// vc_control = control_manual ;
 633: LD_ADDR_OWVAR 38
 637: PUSH
 638: LD_INT 1
 640: ST_TO_ADDR
// vc_weapon = 44 ;
 641: LD_ADDR_OWVAR 40
 645: PUSH
 646: LD_INT 44
 648: ST_TO_ADDR
// A1 = CreateVehicle ;
 649: LD_ADDR_EXP 1
 653: PUSH
 654: CALL_OW 45
 658: ST_TO_ADDR
// A2 = CreateVehicle ;
 659: LD_ADDR_EXP 2
 663: PUSH
 664: CALL_OW 45
 668: ST_TO_ADDR
// hc_class = 3 ;
 669: LD_ADDR_OWVAR 28
 673: PUSH
 674: LD_INT 3
 676: ST_TO_ADDR
// hc_name =  ;
 677: LD_ADDR_OWVAR 26
 681: PUSH
 682: LD_STRING 
 684: ST_TO_ADDR
// uc_side = 6 ;
 685: LD_ADDR_OWVAR 20
 689: PUSH
 690: LD_INT 6
 692: ST_TO_ADDR
// uc_nation = 3 ;
 693: LD_ADDR_OWVAR 21
 697: PUSH
 698: LD_INT 3
 700: ST_TO_ADDR
// hc_gallery =  ;
 701: LD_ADDR_OWVAR 33
 705: PUSH
 706: LD_STRING 
 708: ST_TO_ADDR
// hc_sex = sex_male ;
 709: LD_ADDR_OWVAR 27
 713: PUSH
 714: LD_INT 1
 716: ST_TO_ADDR
// hc_skills = [ Rand ( 0 , 1 ) , Rand ( 0 , 2 ) , level , Rand ( 0 , 1 ) ] ;
 717: LD_ADDR_OWVAR 31
 721: PUSH
 722: LD_INT 0
 724: PPUSH
 725: LD_INT 1
 727: PPUSH
 728: CALL_OW 12
 732: PUSH
 733: LD_INT 0
 735: PPUSH
 736: LD_INT 2
 738: PPUSH
 739: CALL_OW 12
 743: PUSH
 744: LD_VAR 0 2
 748: PUSH
 749: LD_INT 0
 751: PPUSH
 752: LD_INT 1
 754: PPUSH
 755: CALL_OW 12
 759: PUSH
 760: EMPTY
 761: LIST
 762: LIST
 763: LIST
 764: LIST
 765: ST_TO_ADDR
// A3 = CreateHuman ;
 766: LD_ADDR_EXP 3
 770: PUSH
 771: CALL_OW 44
 775: ST_TO_ADDR
// A4 = CreateHuman ;
 776: LD_ADDR_EXP 4
 780: PUSH
 781: CALL_OW 44
 785: ST_TO_ADDR
// PlaceHumanInUnit ( A3 , A1 ) ;
 786: LD_EXP 3
 790: PPUSH
 791: LD_EXP 1
 795: PPUSH
 796: CALL_OW 52
// PlaceHumanInUnit ( A4 , A2 ) ;
 800: LD_EXP 4
 804: PPUSH
 805: LD_EXP 2
 809: PPUSH
 810: CALL_OW 52
// PlaceUnitArea ( A2 , ATAK_LEWA , false ) ;
 814: LD_EXP 2
 818: PPUSH
 819: LD_INT 1
 821: PPUSH
 822: LD_INT 0
 824: PPUSH
 825: CALL_OW 49
// PlaceUnitArea ( A1 , ATAK_LEWA , false ) ;
 829: LD_EXP 1
 833: PPUSH
 834: LD_INT 1
 836: PPUSH
 837: LD_INT 0
 839: PPUSH
 840: CALL_OW 49
// ComAgressiveMove ( [ A1 , A2 ] , 96 , 10 ) ;
 844: LD_EXP 1
 848: PUSH
 849: LD_EXP 2
 853: PUSH
 854: EMPTY
 855: LIST
 856: LIST
 857: PPUSH
 858: LD_INT 96
 860: PPUSH
 861: LD_INT 10
 863: PPUSH
 864: CALL_OW 114
// end ; end_of_file
 868: LD_VAR 0 1
 872: RET
// export Q1 , Q2 ; export function ATAK2 ; begin
 873: LD_INT 0
 875: PPUSH
// ; vc_chassis = 24 ;
 876: LD_ADDR_OWVAR 37
 880: PUSH
 881: LD_INT 24
 883: ST_TO_ADDR
// vc_engine = engine_combustion ;
 884: LD_ADDR_OWVAR 39
 888: PUSH
 889: LD_INT 1
 891: ST_TO_ADDR
// vc_control = control_computer ;
 892: LD_ADDR_OWVAR 38
 896: PUSH
 897: LD_INT 3
 899: ST_TO_ADDR
// vc_weapon = 46 ;
 900: LD_ADDR_OWVAR 40
 904: PUSH
 905: LD_INT 46
 907: ST_TO_ADDR
// uc_side = 6 ;
 908: LD_ADDR_OWVAR 20
 912: PUSH
 913: LD_INT 6
 915: ST_TO_ADDR
// uc_nation = 3 ;
 916: LD_ADDR_OWVAR 21
 920: PUSH
 921: LD_INT 3
 923: ST_TO_ADDR
// Q1 = CreateVehicle ;
 924: LD_ADDR_EXP 5
 928: PUSH
 929: CALL_OW 45
 933: ST_TO_ADDR
// Q2 = CreateVehicle ;
 934: LD_ADDR_EXP 6
 938: PUSH
 939: CALL_OW 45
 943: ST_TO_ADDR
// PlaceUnitArea ( Q1 , ATAK_LEWA , false ) ;
 944: LD_EXP 5
 948: PPUSH
 949: LD_INT 1
 951: PPUSH
 952: LD_INT 0
 954: PPUSH
 955: CALL_OW 49
// PlaceUnitArea ( Q2 , ATAK_LEWA , false ) ;
 959: LD_EXP 6
 963: PPUSH
 964: LD_INT 1
 966: PPUSH
 967: LD_INT 0
 969: PPUSH
 970: CALL_OW 49
// ComAgressiveMove ( [ Q1 , Q2 ] , 96 , 10 ) ;
 974: LD_EXP 5
 978: PUSH
 979: LD_EXP 6
 983: PUSH
 984: EMPTY
 985: LIST
 986: LIST
 987: PPUSH
 988: LD_INT 96
 990: PPUSH
 991: LD_INT 10
 993: PPUSH
 994: CALL_OW 114
// end ; end_of_file
 998: LD_VAR 0 1
1002: RET
// export E1 , E2 ; export function ATAK4 ; begin
1003: LD_INT 0
1005: PPUSH
// ; vc_chassis = 22 ;
1006: LD_ADDR_OWVAR 37
1010: PUSH
1011: LD_INT 22
1013: ST_TO_ADDR
// vc_engine = engine_combustion ;
1014: LD_ADDR_OWVAR 39
1018: PUSH
1019: LD_INT 1
1021: ST_TO_ADDR
// vc_control = control_computer ;
1022: LD_ADDR_OWVAR 38
1026: PUSH
1027: LD_INT 3
1029: ST_TO_ADDR
// vc_weapon = 43 ;
1030: LD_ADDR_OWVAR 40
1034: PUSH
1035: LD_INT 43
1037: ST_TO_ADDR
// uc_side = 6 ;
1038: LD_ADDR_OWVAR 20
1042: PUSH
1043: LD_INT 6
1045: ST_TO_ADDR
// uc_nation = 3 ;
1046: LD_ADDR_OWVAR 21
1050: PUSH
1051: LD_INT 3
1053: ST_TO_ADDR
// E1 = CreateVehicle ;
1054: LD_ADDR_EXP 7
1058: PUSH
1059: CALL_OW 45
1063: ST_TO_ADDR
// E2 = CreateVehicle ;
1064: LD_ADDR_EXP 8
1068: PUSH
1069: CALL_OW 45
1073: ST_TO_ADDR
// PlaceUnitArea ( E1 , ATAK_LEWA , false ) ;
1074: LD_EXP 7
1078: PPUSH
1079: LD_INT 1
1081: PPUSH
1082: LD_INT 0
1084: PPUSH
1085: CALL_OW 49
// PlaceUnitArea ( E2 , ATAK_LEWA , false ) ;
1089: LD_EXP 8
1093: PPUSH
1094: LD_INT 1
1096: PPUSH
1097: LD_INT 0
1099: PPUSH
1100: CALL_OW 49
// ComAgressiveMove ( [ E1 , E2 ] , 96 , 10 ) ;
1104: LD_EXP 7
1108: PUSH
1109: LD_EXP 8
1113: PUSH
1114: EMPTY
1115: LIST
1116: LIST
1117: PPUSH
1118: LD_INT 96
1120: PPUSH
1121: LD_INT 10
1123: PPUSH
1124: CALL_OW 114
// end ; end_of_file
1128: LD_VAR 0 1
1132: RET
// export W1 , W2 ; export function ATAK3 ; begin
1133: LD_INT 0
1135: PPUSH
// ; vc_chassis = 22 ;
1136: LD_ADDR_OWVAR 37
1140: PUSH
1141: LD_INT 22
1143: ST_TO_ADDR
// vc_engine = engine_combustion ;
1144: LD_ADDR_OWVAR 39
1148: PUSH
1149: LD_INT 1
1151: ST_TO_ADDR
// vc_control = control_computer ;
1152: LD_ADDR_OWVAR 38
1156: PUSH
1157: LD_INT 3
1159: ST_TO_ADDR
// vc_weapon = 45 ;
1160: LD_ADDR_OWVAR 40
1164: PUSH
1165: LD_INT 45
1167: ST_TO_ADDR
// uc_side = 6 ;
1168: LD_ADDR_OWVAR 20
1172: PUSH
1173: LD_INT 6
1175: ST_TO_ADDR
// uc_nation = 3 ;
1176: LD_ADDR_OWVAR 21
1180: PUSH
1181: LD_INT 3
1183: ST_TO_ADDR
// W1 = CreateVehicle ;
1184: LD_ADDR_EXP 9
1188: PUSH
1189: CALL_OW 45
1193: ST_TO_ADDR
// W2 = CreateVehicle ;
1194: LD_ADDR_EXP 10
1198: PUSH
1199: CALL_OW 45
1203: ST_TO_ADDR
// PlaceUnitArea ( W1 , ATAK_LEWA , false ) ;
1204: LD_EXP 9
1208: PPUSH
1209: LD_INT 1
1211: PPUSH
1212: LD_INT 0
1214: PPUSH
1215: CALL_OW 49
// PlaceUnitArea ( W2 , ATAK_LEWA , false ) ;
1219: LD_EXP 10
1223: PPUSH
1224: LD_INT 1
1226: PPUSH
1227: LD_INT 0
1229: PPUSH
1230: CALL_OW 49
// ComAgressiveMove ( [ W1 , W2 ] , 96 , 10 ) ;
1234: LD_EXP 9
1238: PUSH
1239: LD_EXP 10
1243: PUSH
1244: EMPTY
1245: LIST
1246: LIST
1247: PPUSH
1248: LD_INT 96
1250: PPUSH
1251: LD_INT 10
1253: PPUSH
1254: CALL_OW 114
// end ; end_of_file
1258: LD_VAR 0 1
1262: RET
// export S1 , S2 , S3 , S4 ; export function ATAK_1 ; var level ; begin
1263: LD_INT 0
1265: PPUSH
1266: PPUSH
// level = [ 5 , 6 , 6 ] [ Difficulty ] ;
1267: LD_ADDR_VAR 0 2
1271: PUSH
1272: LD_INT 5
1274: PUSH
1275: LD_INT 6
1277: PUSH
1278: LD_INT 6
1280: PUSH
1281: EMPTY
1282: LIST
1283: LIST
1284: LIST
1285: PUSH
1286: LD_OWVAR 67
1290: ARRAY
1291: ST_TO_ADDR
// vc_chassis = 22 ;
1292: LD_ADDR_OWVAR 37
1296: PUSH
1297: LD_INT 22
1299: ST_TO_ADDR
// vc_engine = engine_combustion ;
1300: LD_ADDR_OWVAR 39
1304: PUSH
1305: LD_INT 1
1307: ST_TO_ADDR
// vc_control = control_manual ;
1308: LD_ADDR_OWVAR 38
1312: PUSH
1313: LD_INT 1
1315: ST_TO_ADDR
// vc_weapon = 44 ;
1316: LD_ADDR_OWVAR 40
1320: PUSH
1321: LD_INT 44
1323: ST_TO_ADDR
// hc_class = 3 ;
1324: LD_ADDR_OWVAR 28
1328: PUSH
1329: LD_INT 3
1331: ST_TO_ADDR
// hc_name =  ;
1332: LD_ADDR_OWVAR 26
1336: PUSH
1337: LD_STRING 
1339: ST_TO_ADDR
// uc_side = 6 ;
1340: LD_ADDR_OWVAR 20
1344: PUSH
1345: LD_INT 6
1347: ST_TO_ADDR
// uc_nation = 3 ;
1348: LD_ADDR_OWVAR 21
1352: PUSH
1353: LD_INT 3
1355: ST_TO_ADDR
// hc_gallery =  ;
1356: LD_ADDR_OWVAR 33
1360: PUSH
1361: LD_STRING 
1363: ST_TO_ADDR
// hc_sex = sex_male ;
1364: LD_ADDR_OWVAR 27
1368: PUSH
1369: LD_INT 1
1371: ST_TO_ADDR
// S1 = CreateVehicle ;
1372: LD_ADDR_EXP 11
1376: PUSH
1377: CALL_OW 45
1381: ST_TO_ADDR
// S2 = CreateVehicle ;
1382: LD_ADDR_EXP 12
1386: PUSH
1387: CALL_OW 45
1391: ST_TO_ADDR
// hc_skills = [ Rand ( 0 , 1 ) , Rand ( 0 , 2 ) , level , Rand ( 0 , 1 ) ] ;
1392: LD_ADDR_OWVAR 31
1396: PUSH
1397: LD_INT 0
1399: PPUSH
1400: LD_INT 1
1402: PPUSH
1403: CALL_OW 12
1407: PUSH
1408: LD_INT 0
1410: PPUSH
1411: LD_INT 2
1413: PPUSH
1414: CALL_OW 12
1418: PUSH
1419: LD_VAR 0 2
1423: PUSH
1424: LD_INT 0
1426: PPUSH
1427: LD_INT 1
1429: PPUSH
1430: CALL_OW 12
1434: PUSH
1435: EMPTY
1436: LIST
1437: LIST
1438: LIST
1439: LIST
1440: ST_TO_ADDR
// S3 = CreateHuman ;
1441: LD_ADDR_EXP 13
1445: PUSH
1446: CALL_OW 44
1450: ST_TO_ADDR
// S4 = CreateHuman ;
1451: LD_ADDR_EXP 14
1455: PUSH
1456: CALL_OW 44
1460: ST_TO_ADDR
// PlaceHumanInUnit ( S4 , S1 ) ;
1461: LD_EXP 14
1465: PPUSH
1466: LD_EXP 11
1470: PPUSH
1471: CALL_OW 52
// PlaceHumanInUnit ( S3 , S2 ) ;
1475: LD_EXP 13
1479: PPUSH
1480: LD_EXP 12
1484: PPUSH
1485: CALL_OW 52
// PlaceUnitArea ( S1 , ATAK_POLUDNIE2 , false ) ;
1489: LD_EXP 11
1493: PPUSH
1494: LD_INT 4
1496: PPUSH
1497: LD_INT 0
1499: PPUSH
1500: CALL_OW 49
// PlaceUnitArea ( S2 , ATAK_POLUDNIE2 , false ) ;
1504: LD_EXP 12
1508: PPUSH
1509: LD_INT 4
1511: PPUSH
1512: LD_INT 0
1514: PPUSH
1515: CALL_OW 49
// ComAgressiveMove ( [ S1 , S2 ] , 96 , 10 ) ;
1519: LD_EXP 11
1523: PUSH
1524: LD_EXP 12
1528: PUSH
1529: EMPTY
1530: LIST
1531: LIST
1532: PPUSH
1533: LD_INT 96
1535: PPUSH
1536: LD_INT 10
1538: PPUSH
1539: CALL_OW 114
// end ; end_of_file
1543: LD_VAR 0 1
1547: RET
// export N1 , N2 ; export function ATAK_2 ; begin
1548: LD_INT 0
1550: PPUSH
// ; vc_chassis = 24 ;
1551: LD_ADDR_OWVAR 37
1555: PUSH
1556: LD_INT 24
1558: ST_TO_ADDR
// vc_engine = engine_combustion ;
1559: LD_ADDR_OWVAR 39
1563: PUSH
1564: LD_INT 1
1566: ST_TO_ADDR
// vc_control = control_computer ;
1567: LD_ADDR_OWVAR 38
1571: PUSH
1572: LD_INT 3
1574: ST_TO_ADDR
// vc_weapon = 46 ;
1575: LD_ADDR_OWVAR 40
1579: PUSH
1580: LD_INT 46
1582: ST_TO_ADDR
// uc_side = 6 ;
1583: LD_ADDR_OWVAR 20
1587: PUSH
1588: LD_INT 6
1590: ST_TO_ADDR
// uc_nation = 3 ;
1591: LD_ADDR_OWVAR 21
1595: PUSH
1596: LD_INT 3
1598: ST_TO_ADDR
// N1 = CreateVehicle ;
1599: LD_ADDR_EXP 15
1603: PUSH
1604: CALL_OW 45
1608: ST_TO_ADDR
// N2 = CreateVehicle ;
1609: LD_ADDR_EXP 16
1613: PUSH
1614: CALL_OW 45
1618: ST_TO_ADDR
// PlaceUnitArea ( N1 , ATAK_POLUDNIE2 , false ) ;
1619: LD_EXP 15
1623: PPUSH
1624: LD_INT 4
1626: PPUSH
1627: LD_INT 0
1629: PPUSH
1630: CALL_OW 49
// PlaceUnitArea ( N2 , ATAK_POLUDNIE2 , false ) ;
1634: LD_EXP 16
1638: PPUSH
1639: LD_INT 4
1641: PPUSH
1642: LD_INT 0
1644: PPUSH
1645: CALL_OW 49
// ComAgressiveMove ( [ N1 , N2 ] , 96 , 10 ) ;
1649: LD_EXP 15
1653: PUSH
1654: LD_EXP 16
1658: PUSH
1659: EMPTY
1660: LIST
1661: LIST
1662: PPUSH
1663: LD_INT 96
1665: PPUSH
1666: LD_INT 10
1668: PPUSH
1669: CALL_OW 114
// end ; end_of_file
1673: LD_VAR 0 1
1677: RET
// export T1 , T2 ; export function ATAK_3 ; begin
1678: LD_INT 0
1680: PPUSH
// ; vc_chassis = 22 ;
1681: LD_ADDR_OWVAR 37
1685: PUSH
1686: LD_INT 22
1688: ST_TO_ADDR
// vc_engine = engine_combustion ;
1689: LD_ADDR_OWVAR 39
1693: PUSH
1694: LD_INT 1
1696: ST_TO_ADDR
// vc_control = control_computer ;
1697: LD_ADDR_OWVAR 38
1701: PUSH
1702: LD_INT 3
1704: ST_TO_ADDR
// vc_weapon = 45 ;
1705: LD_ADDR_OWVAR 40
1709: PUSH
1710: LD_INT 45
1712: ST_TO_ADDR
// uc_side = 6 ;
1713: LD_ADDR_OWVAR 20
1717: PUSH
1718: LD_INT 6
1720: ST_TO_ADDR
// uc_nation = 3 ;
1721: LD_ADDR_OWVAR 21
1725: PUSH
1726: LD_INT 3
1728: ST_TO_ADDR
// T1 = CreateVehicle ;
1729: LD_ADDR_EXP 17
1733: PUSH
1734: CALL_OW 45
1738: ST_TO_ADDR
// T2 = CreateVehicle ;
1739: LD_ADDR_EXP 18
1743: PUSH
1744: CALL_OW 45
1748: ST_TO_ADDR
// PlaceUnitArea ( T1 , ATAK_POLUDNIE2 , false ) ;
1749: LD_EXP 17
1753: PPUSH
1754: LD_INT 4
1756: PPUSH
1757: LD_INT 0
1759: PPUSH
1760: CALL_OW 49
// PlaceUnitArea ( T2 , ATAK_POLUDNIE2 , false ) ;
1764: LD_EXP 18
1768: PPUSH
1769: LD_INT 4
1771: PPUSH
1772: LD_INT 0
1774: PPUSH
1775: CALL_OW 49
// ComAgressiveMove ( [ T1 , T2 ] , 96 , 10 ) ;
1779: LD_EXP 17
1783: PUSH
1784: LD_EXP 18
1788: PUSH
1789: EMPTY
1790: LIST
1791: LIST
1792: PPUSH
1793: LD_INT 96
1795: PPUSH
1796: LD_INT 10
1798: PPUSH
1799: CALL_OW 114
// end ; end_of_file
1803: LD_VAR 0 1
1807: RET
// export OWChyba , PULK_02 , AM4 , AM6 , R1 , R2 , Rc , sa , sd , postac1 , postac2 , postac3 , postac4 , postac5 , med1 , med2 , med3 , med4 , med5 , M4 , M6 , AM3 , AM2 , Rv , cz , cx , M1 , M3 , Gc , UsVeh1 , UsVeh2 , UsVeh3 , UsVeh4 , UsVeh5 , UsVeh6 , UsVeh7 , UsVeh8 , UsVeh9 , AmericanAttack1 ; export function PrepareHero1 ; begin
1808: LD_INT 0
1810: PPUSH
// uc_side = 4 ;
1811: LD_ADDR_OWVAR 20
1815: PUSH
1816: LD_INT 4
1818: ST_TO_ADDR
// uc_nation = 1 ;
1819: LD_ADDR_OWVAR 21
1823: PUSH
1824: LD_INT 1
1826: ST_TO_ADDR
// OWCHyba := CreateCharacter ( OWChyba ) ;
1827: LD_ADDR_EXP 19
1831: PUSH
1832: LD_STRING OWChyba
1834: PPUSH
1835: CALL_OW 34
1839: ST_TO_ADDR
// PlaceUnitArea ( OWChyba , ATAK_POLUDNIE , false ) ;
1840: LD_EXP 19
1844: PPUSH
1845: LD_INT 2
1847: PPUSH
1848: LD_INT 0
1850: PPUSH
1851: CALL_OW 49
// uc_side = 1 ;
1855: LD_ADDR_OWVAR 20
1859: PUSH
1860: LD_INT 1
1862: ST_TO_ADDR
// uc_nation = 1 ;
1863: LD_ADDR_OWVAR 21
1867: PUSH
1868: LD_INT 1
1870: ST_TO_ADDR
// PULK_02 := CreateCharacter ( PULK_02 ) ;
1871: LD_ADDR_EXP 20
1875: PUSH
1876: LD_STRING PULK_02
1878: PPUSH
1879: CALL_OW 34
1883: ST_TO_ADDR
// uc_side = 4 ;
1884: LD_ADDR_OWVAR 20
1888: PUSH
1889: LD_INT 4
1891: ST_TO_ADDR
// uc_nation = 1 ;
1892: LD_ADDR_OWVAR 21
1896: PUSH
1897: LD_INT 1
1899: ST_TO_ADDR
// R2 := CreateCharacter ( R2 ) ;
1900: LD_ADDR_EXP 24
1904: PUSH
1905: LD_STRING R2
1907: PPUSH
1908: CALL_OW 34
1912: ST_TO_ADDR
// PlaceUnitArea ( R2 , ATAK_POLUDNIE , false ) ;
1913: LD_EXP 24
1917: PPUSH
1918: LD_INT 2
1920: PPUSH
1921: LD_INT 0
1923: PPUSH
1924: CALL_OW 49
// uc_side = 4 ;
1928: LD_ADDR_OWVAR 20
1932: PUSH
1933: LD_INT 4
1935: ST_TO_ADDR
// uc_nation = 1 ;
1936: LD_ADDR_OWVAR 21
1940: PUSH
1941: LD_INT 1
1943: ST_TO_ADDR
// AM4 := CreateCharacter ( AM4 ) ;
1944: LD_ADDR_EXP 21
1948: PUSH
1949: LD_STRING AM4
1951: PPUSH
1952: CALL_OW 34
1956: ST_TO_ADDR
// PlaceUnitArea ( AM4 , ATAK_POLUDNIE , false ) ;
1957: LD_EXP 21
1961: PPUSH
1962: LD_INT 2
1964: PPUSH
1965: LD_INT 0
1967: PPUSH
1968: CALL_OW 49
// uc_side = 4 ;
1972: LD_ADDR_OWVAR 20
1976: PUSH
1977: LD_INT 4
1979: ST_TO_ADDR
// uc_nation = 1 ;
1980: LD_ADDR_OWVAR 21
1984: PUSH
1985: LD_INT 1
1987: ST_TO_ADDR
// AM6 := CreateCharacter ( AM6 ) ;
1988: LD_ADDR_EXP 22
1992: PUSH
1993: LD_STRING AM6
1995: PPUSH
1996: CALL_OW 34
2000: ST_TO_ADDR
// PlaceUnitArea ( AM6 , ATAK_POLUDNIE , false ) ;
2001: LD_EXP 22
2005: PPUSH
2006: LD_INT 2
2008: PPUSH
2009: LD_INT 0
2011: PPUSH
2012: CALL_OW 49
// uc_side = 4 ;
2016: LD_ADDR_OWVAR 20
2020: PUSH
2021: LD_INT 4
2023: ST_TO_ADDR
// uc_nation = 1 ;
2024: LD_ADDR_OWVAR 21
2028: PUSH
2029: LD_INT 1
2031: ST_TO_ADDR
// Rc := CreateCharacter ( Rc ) ;
2032: LD_ADDR_EXP 25
2036: PUSH
2037: LD_STRING Rc
2039: PPUSH
2040: CALL_OW 34
2044: ST_TO_ADDR
// PlaceUnitArea ( Rc , ATAK_POLUDNIE , false ) ;
2045: LD_EXP 25
2049: PPUSH
2050: LD_INT 2
2052: PPUSH
2053: LD_INT 0
2055: PPUSH
2056: CALL_OW 49
// uc_side = 4 ;
2060: LD_ADDR_OWVAR 20
2064: PUSH
2065: LD_INT 4
2067: ST_TO_ADDR
// uc_nation = 1 ;
2068: LD_ADDR_OWVAR 21
2072: PUSH
2073: LD_INT 1
2075: ST_TO_ADDR
// sa := CreateCharacter ( sa ) ;
2076: LD_ADDR_EXP 26
2080: PUSH
2081: LD_STRING sa
2083: PPUSH
2084: CALL_OW 34
2088: ST_TO_ADDR
// PlaceUnitArea ( sa , ATAK_POLUDNIE , false ) ;
2089: LD_EXP 26
2093: PPUSH
2094: LD_INT 2
2096: PPUSH
2097: LD_INT 0
2099: PPUSH
2100: CALL_OW 49
// uc_side = 4 ;
2104: LD_ADDR_OWVAR 20
2108: PUSH
2109: LD_INT 4
2111: ST_TO_ADDR
// uc_nation = 1 ;
2112: LD_ADDR_OWVAR 21
2116: PUSH
2117: LD_INT 1
2119: ST_TO_ADDR
// sd := CreateCharacter ( sd ) ;
2120: LD_ADDR_EXP 27
2124: PUSH
2125: LD_STRING sd
2127: PPUSH
2128: CALL_OW 34
2132: ST_TO_ADDR
// PlaceUnitArea ( sd , ATAK_POLUDNIE , false ) ;
2133: LD_EXP 27
2137: PPUSH
2138: LD_INT 2
2140: PPUSH
2141: LD_INT 0
2143: PPUSH
2144: CALL_OW 49
// uc_side = 4 ;
2148: LD_ADDR_OWVAR 20
2152: PUSH
2153: LD_INT 4
2155: ST_TO_ADDR
// uc_nation = 1 ;
2156: LD_ADDR_OWVAR 21
2160: PUSH
2161: LD_INT 1
2163: ST_TO_ADDR
// postac1 := CreateCharacter ( postac1 ) ;
2164: LD_ADDR_EXP 28
2168: PUSH
2169: LD_STRING postac1
2171: PPUSH
2172: CALL_OW 34
2176: ST_TO_ADDR
// PlaceUnitArea ( postac1 , ATAK_POLUDNIE , false ) ;
2177: LD_EXP 28
2181: PPUSH
2182: LD_INT 2
2184: PPUSH
2185: LD_INT 0
2187: PPUSH
2188: CALL_OW 49
// uc_side = 4 ;
2192: LD_ADDR_OWVAR 20
2196: PUSH
2197: LD_INT 4
2199: ST_TO_ADDR
// uc_nation = 1 ;
2200: LD_ADDR_OWVAR 21
2204: PUSH
2205: LD_INT 1
2207: ST_TO_ADDR
// postac2 := CreateCharacter ( postac2 ) ;
2208: LD_ADDR_EXP 29
2212: PUSH
2213: LD_STRING postac2
2215: PPUSH
2216: CALL_OW 34
2220: ST_TO_ADDR
// PlaceUnitArea ( postac2 , ATAK_POLUDNIE , false ) ;
2221: LD_EXP 29
2225: PPUSH
2226: LD_INT 2
2228: PPUSH
2229: LD_INT 0
2231: PPUSH
2232: CALL_OW 49
// uc_side = 4 ;
2236: LD_ADDR_OWVAR 20
2240: PUSH
2241: LD_INT 4
2243: ST_TO_ADDR
// uc_nation = 1 ;
2244: LD_ADDR_OWVAR 21
2248: PUSH
2249: LD_INT 1
2251: ST_TO_ADDR
// postac3 := CreateCharacter ( postac3 ) ;
2252: LD_ADDR_EXP 30
2256: PUSH
2257: LD_STRING postac3
2259: PPUSH
2260: CALL_OW 34
2264: ST_TO_ADDR
// PlaceUnitArea ( postac3 , ATAK_POLUDNIE , false ) ;
2265: LD_EXP 30
2269: PPUSH
2270: LD_INT 2
2272: PPUSH
2273: LD_INT 0
2275: PPUSH
2276: CALL_OW 49
// uc_side = 4 ;
2280: LD_ADDR_OWVAR 20
2284: PUSH
2285: LD_INT 4
2287: ST_TO_ADDR
// uc_nation = 1 ;
2288: LD_ADDR_OWVAR 21
2292: PUSH
2293: LD_INT 1
2295: ST_TO_ADDR
// postac4 := CreateCharacter ( postac4 ) ;
2296: LD_ADDR_EXP 31
2300: PUSH
2301: LD_STRING postac4
2303: PPUSH
2304: CALL_OW 34
2308: ST_TO_ADDR
// PlaceUnitArea ( postac4 , ATAK_POLUDNIE , false ) ;
2309: LD_EXP 31
2313: PPUSH
2314: LD_INT 2
2316: PPUSH
2317: LD_INT 0
2319: PPUSH
2320: CALL_OW 49
// uc_side = 4 ;
2324: LD_ADDR_OWVAR 20
2328: PUSH
2329: LD_INT 4
2331: ST_TO_ADDR
// uc_nation = 1 ;
2332: LD_ADDR_OWVAR 21
2336: PUSH
2337: LD_INT 1
2339: ST_TO_ADDR
// postac5 := CreateCharacter ( postac5 ) ;
2340: LD_ADDR_EXP 32
2344: PUSH
2345: LD_STRING postac5
2347: PPUSH
2348: CALL_OW 34
2352: ST_TO_ADDR
// PlaceUnitArea ( postac5 , ATAK_POLUDNIE , false ) ;
2353: LD_EXP 32
2357: PPUSH
2358: LD_INT 2
2360: PPUSH
2361: LD_INT 0
2363: PPUSH
2364: CALL_OW 49
// uc_side = 4 ;
2368: LD_ADDR_OWVAR 20
2372: PUSH
2373: LD_INT 4
2375: ST_TO_ADDR
// uc_nation = 1 ;
2376: LD_ADDR_OWVAR 21
2380: PUSH
2381: LD_INT 1
2383: ST_TO_ADDR
// med1 := CreateCharacter ( med1 ) ;
2384: LD_ADDR_EXP 33
2388: PUSH
2389: LD_STRING med1
2391: PPUSH
2392: CALL_OW 34
2396: ST_TO_ADDR
// PlaceUnitArea ( med1 , ATAK_POLUDNIE , false ) ;
2397: LD_EXP 33
2401: PPUSH
2402: LD_INT 2
2404: PPUSH
2405: LD_INT 0
2407: PPUSH
2408: CALL_OW 49
// uc_side = 4 ;
2412: LD_ADDR_OWVAR 20
2416: PUSH
2417: LD_INT 4
2419: ST_TO_ADDR
// uc_nation = 1 ;
2420: LD_ADDR_OWVAR 21
2424: PUSH
2425: LD_INT 1
2427: ST_TO_ADDR
// med2 := CreateCharacter ( med2 ) ;
2428: LD_ADDR_EXP 34
2432: PUSH
2433: LD_STRING med2
2435: PPUSH
2436: CALL_OW 34
2440: ST_TO_ADDR
// PlaceUnitArea ( med2 , ATAK_POLUDNIE , false ) ;
2441: LD_EXP 34
2445: PPUSH
2446: LD_INT 2
2448: PPUSH
2449: LD_INT 0
2451: PPUSH
2452: CALL_OW 49
// uc_side = 4 ;
2456: LD_ADDR_OWVAR 20
2460: PUSH
2461: LD_INT 4
2463: ST_TO_ADDR
// uc_nation = 1 ;
2464: LD_ADDR_OWVAR 21
2468: PUSH
2469: LD_INT 1
2471: ST_TO_ADDR
// M4 := CreateCharacter ( M4 ) ;
2472: LD_ADDR_EXP 38
2476: PUSH
2477: LD_STRING M4
2479: PPUSH
2480: CALL_OW 34
2484: ST_TO_ADDR
// PlaceUnitArea ( M4 , ATAK_POLUDNIE , false ) ;
2485: LD_EXP 38
2489: PPUSH
2490: LD_INT 2
2492: PPUSH
2493: LD_INT 0
2495: PPUSH
2496: CALL_OW 49
// uc_side = 4 ;
2500: LD_ADDR_OWVAR 20
2504: PUSH
2505: LD_INT 4
2507: ST_TO_ADDR
// uc_nation = 1 ;
2508: LD_ADDR_OWVAR 21
2512: PUSH
2513: LD_INT 1
2515: ST_TO_ADDR
// med3 := CreateCharacter ( med3 ) ;
2516: LD_ADDR_EXP 35
2520: PUSH
2521: LD_STRING med3
2523: PPUSH
2524: CALL_OW 34
2528: ST_TO_ADDR
// PlaceUnitArea ( med3 , ATAK_POLUDNIE , false ) ;
2529: LD_EXP 35
2533: PPUSH
2534: LD_INT 2
2536: PPUSH
2537: LD_INT 0
2539: PPUSH
2540: CALL_OW 49
// uc_side = 4 ;
2544: LD_ADDR_OWVAR 20
2548: PUSH
2549: LD_INT 4
2551: ST_TO_ADDR
// uc_nation = 1 ;
2552: LD_ADDR_OWVAR 21
2556: PUSH
2557: LD_INT 1
2559: ST_TO_ADDR
// M6 := CreateCharacter ( M6 ) ;
2560: LD_ADDR_EXP 39
2564: PUSH
2565: LD_STRING M6
2567: PPUSH
2568: CALL_OW 34
2572: ST_TO_ADDR
// PlaceUnitArea ( M6 , ATAK_POLUDNIE , false ) ;
2573: LD_EXP 39
2577: PPUSH
2578: LD_INT 2
2580: PPUSH
2581: LD_INT 0
2583: PPUSH
2584: CALL_OW 49
// uc_side = 4 ;
2588: LD_ADDR_OWVAR 20
2592: PUSH
2593: LD_INT 4
2595: ST_TO_ADDR
// uc_nation = 1 ;
2596: LD_ADDR_OWVAR 21
2600: PUSH
2601: LD_INT 1
2603: ST_TO_ADDR
// med4 := CreateCharacter ( med4 ) ;
2604: LD_ADDR_EXP 36
2608: PUSH
2609: LD_STRING med4
2611: PPUSH
2612: CALL_OW 34
2616: ST_TO_ADDR
// PlaceUnitArea ( med4 , ATAK_POLUDNIE , false ) ;
2617: LD_EXP 36
2621: PPUSH
2622: LD_INT 2
2624: PPUSH
2625: LD_INT 0
2627: PPUSH
2628: CALL_OW 49
// uc_side = 4 ;
2632: LD_ADDR_OWVAR 20
2636: PUSH
2637: LD_INT 4
2639: ST_TO_ADDR
// uc_nation = 1 ;
2640: LD_ADDR_OWVAR 21
2644: PUSH
2645: LD_INT 1
2647: ST_TO_ADDR
// med5 := CreateCharacter ( med5 ) ;
2648: LD_ADDR_EXP 37
2652: PUSH
2653: LD_STRING med5
2655: PPUSH
2656: CALL_OW 34
2660: ST_TO_ADDR
// PlaceUnitArea ( med5 , ATAK_POLUDNIE , false ) ;
2661: LD_EXP 37
2665: PPUSH
2666: LD_INT 2
2668: PPUSH
2669: LD_INT 0
2671: PPUSH
2672: CALL_OW 49
// end ; end_of_file
2676: LD_VAR 0 1
2680: RET
// export center ; every 0 0$1 trigger Center = 1 do
2681: LD_EXP 58
2685: PUSH
2686: LD_INT 1
2688: EQUAL
2689: IFFALSE 2704
2691: GO 2693
2693: DISABLE
// begin ; CenterNowOnUnits ( OWChyba ) ;
2694: LD_EXP 19
2698: PPUSH
2699: CALL_OW 87
// enable ;
2703: ENABLE
// end ; end_of_file
2704: END
// export W5 , W6 , W3 , W4 ; export function wsparcie1 ; begin
2705: LD_INT 0
2707: PPUSH
// ; vc_chassis = 2 ;
2708: LD_ADDR_OWVAR 37
2712: PUSH
2713: LD_INT 2
2715: ST_TO_ADDR
// vc_engine = engine_combustion ;
2716: LD_ADDR_OWVAR 39
2720: PUSH
2721: LD_INT 1
2723: ST_TO_ADDR
// vc_control = control_manual ;
2724: LD_ADDR_OWVAR 38
2728: PUSH
2729: LD_INT 1
2731: ST_TO_ADDR
// vc_weapon = 12 ;
2732: LD_ADDR_OWVAR 40
2736: PUSH
2737: LD_INT 12
2739: ST_TO_ADDR
// W5 = CreateVehicle ;
2740: LD_ADDR_EXP 59
2744: PUSH
2745: CALL_OW 45
2749: ST_TO_ADDR
// W6 = CreateVehicle ;
2750: LD_ADDR_EXP 60
2754: PUSH
2755: CALL_OW 45
2759: ST_TO_ADDR
// hc_class = 2 ;
2760: LD_ADDR_OWVAR 28
2764: PUSH
2765: LD_INT 2
2767: ST_TO_ADDR
// hc_name =  ;
2768: LD_ADDR_OWVAR 26
2772: PUSH
2773: LD_STRING 
2775: ST_TO_ADDR
// uc_side = 4 ;
2776: LD_ADDR_OWVAR 20
2780: PUSH
2781: LD_INT 4
2783: ST_TO_ADDR
// uc_nation = 1 ;
2784: LD_ADDR_OWVAR 21
2788: PUSH
2789: LD_INT 1
2791: ST_TO_ADDR
// hc_gallery =  ;
2792: LD_ADDR_OWVAR 33
2796: PUSH
2797: LD_STRING 
2799: ST_TO_ADDR
// hc_sex = sex_male ;
2800: LD_ADDR_OWVAR 27
2804: PUSH
2805: LD_INT 1
2807: ST_TO_ADDR
// hc_skills = [ Rand ( 0 , 1 ) , Rand ( 4 , 6 ) , Rand ( 1 , 2 ) , Rand ( 0 , 1 ) ] ;
2808: LD_ADDR_OWVAR 31
2812: PUSH
2813: LD_INT 0
2815: PPUSH
2816: LD_INT 1
2818: PPUSH
2819: CALL_OW 12
2823: PUSH
2824: LD_INT 4
2826: PPUSH
2827: LD_INT 6
2829: PPUSH
2830: CALL_OW 12
2834: PUSH
2835: LD_INT 1
2837: PPUSH
2838: LD_INT 2
2840: PPUSH
2841: CALL_OW 12
2845: PUSH
2846: LD_INT 0
2848: PPUSH
2849: LD_INT 1
2851: PPUSH
2852: CALL_OW 12
2856: PUSH
2857: EMPTY
2858: LIST
2859: LIST
2860: LIST
2861: LIST
2862: ST_TO_ADDR
// W3 = CreateHuman ;
2863: LD_ADDR_EXP 61
2867: PUSH
2868: CALL_OW 44
2872: ST_TO_ADDR
// W4 = CreateHuman ;
2873: LD_ADDR_EXP 62
2877: PUSH
2878: CALL_OW 44
2882: ST_TO_ADDR
// PlaceHumanInUnit ( W3 , W6 ) ;
2883: LD_EXP 61
2887: PPUSH
2888: LD_EXP 60
2892: PPUSH
2893: CALL_OW 52
// PlaceHumanInUnit ( W4 , W5 ) ;
2897: LD_EXP 62
2901: PPUSH
2902: LD_EXP 59
2906: PPUSH
2907: CALL_OW 52
// setcargo ( W6 , mat_cans , 100 ) ;
2911: LD_EXP 60
2915: PPUSH
2916: LD_INT 1
2918: PPUSH
2919: LD_INT 100
2921: PPUSH
2922: CALL_OW 290
// setcargo ( W5 , mat_cans , 100 ) ;
2926: LD_EXP 59
2930: PPUSH
2931: LD_INT 1
2933: PPUSH
2934: LD_INT 100
2936: PPUSH
2937: CALL_OW 290
// PlaceUnitArea ( W5 , WSPARCIE , false ) ;
2941: LD_EXP 59
2945: PPUSH
2946: LD_INT 3
2948: PPUSH
2949: LD_INT 0
2951: PPUSH
2952: CALL_OW 49
// PlaceUnitArea ( W6 , WSPARCIE , false ) ;
2956: LD_EXP 60
2960: PPUSH
2961: LD_INT 3
2963: PPUSH
2964: LD_INT 0
2966: PPUSH
2967: CALL_OW 49
// end ; end_of_file
2971: LD_VAR 0 1
2975: RET
// export ASD1 , ASD2 ; export function wsparcie2 ; begin
2976: LD_INT 0
2978: PPUSH
// ; vc_chassis = 2 ;
2979: LD_ADDR_OWVAR 37
2983: PUSH
2984: LD_INT 2
2986: ST_TO_ADDR
// vc_engine = engine_combustion ;
2987: LD_ADDR_OWVAR 39
2991: PUSH
2992: LD_INT 1
2994: ST_TO_ADDR
// vc_control = control_Computer ;
2995: LD_ADDR_OWVAR 38
2999: PUSH
3000: LD_INT 3
3002: ST_TO_ADDR
// vc_weapon = 12 ;
3003: LD_ADDR_OWVAR 40
3007: PUSH
3008: LD_INT 12
3010: ST_TO_ADDR
// uc_side = 1 ;
3011: LD_ADDR_OWVAR 20
3015: PUSH
3016: LD_INT 1
3018: ST_TO_ADDR
// uc_nation = 1 ;
3019: LD_ADDR_OWVAR 21
3023: PUSH
3024: LD_INT 1
3026: ST_TO_ADDR
// ASD1 = CreateVehicle ;
3027: LD_ADDR_EXP 63
3031: PUSH
3032: CALL_OW 45
3036: ST_TO_ADDR
// ASD2 = CreateVehicle ;
3037: LD_ADDR_EXP 64
3041: PUSH
3042: CALL_OW 45
3046: ST_TO_ADDR
// setcargo ( ASD1 , mat_cans , 100 ) ;
3047: LD_EXP 63
3051: PPUSH
3052: LD_INT 1
3054: PPUSH
3055: LD_INT 100
3057: PPUSH
3058: CALL_OW 290
// setcargo ( ASD2 , mat_oil , 100 ) ;
3062: LD_EXP 64
3066: PPUSH
3067: LD_INT 2
3069: PPUSH
3070: LD_INT 100
3072: PPUSH
3073: CALL_OW 290
// PlaceUnitArea ( ASD1 , WSPARCIE , false ) ;
3077: LD_EXP 63
3081: PPUSH
3082: LD_INT 3
3084: PPUSH
3085: LD_INT 0
3087: PPUSH
3088: CALL_OW 49
// PlaceUnitArea ( ASD2 , WSPARCIE , false ) ;
3092: LD_EXP 64
3096: PPUSH
3097: LD_INT 3
3099: PPUSH
3100: LD_INT 0
3102: PPUSH
3103: CALL_OW 49
// AddComMoveToArea ( ASD1 , wypuszczenie ) ;
3107: LD_EXP 63
3111: PPUSH
3112: LD_INT 6
3114: PPUSH
3115: CALL_OW 173
// AddComMoveToArea ( ASD2 , wypuszczenie ) ;
3119: LD_EXP 64
3123: PPUSH
3124: LD_INT 6
3126: PPUSH
3127: CALL_OW 173
// end ;
3131: LD_VAR 0 1
3135: RET
// every 0 0$01 trigger IsInArea ( ASD1 , wypuszczenie ) do
3136: LD_EXP 63
3140: PPUSH
3141: LD_INT 6
3143: PPUSH
3144: CALL_OW 308
3148: IFFALSE 3174
3150: GO 3152
3152: DISABLE
// begin AddComUnload ( ASD1 ) ;
3153: LD_EXP 63
3157: PPUSH
3158: CALL_OW 219
// AddComMoveToArea ( ASD1 , TRANSPORT ) ;
3162: LD_EXP 63
3166: PPUSH
3167: LD_INT 5
3169: PPUSH
3170: CALL_OW 173
// end ;
3174: END
// every 0 0$1 trigger IsInArea ( ASD1 , TRANSPORT ) do
3175: LD_EXP 63
3179: PPUSH
3180: LD_INT 5
3182: PPUSH
3183: CALL_OW 308
3187: IFFALSE 3201
3189: GO 3191
3191: DISABLE
// begin removeunit ( ASD1 ) ;
3192: LD_EXP 63
3196: PPUSH
3197: CALL_OW 64
// end ;
3201: END
// every 0 0$01 trigger IsInArea ( ASD2 , wypuszczenie ) do
3202: LD_EXP 64
3206: PPUSH
3207: LD_INT 6
3209: PPUSH
3210: CALL_OW 308
3214: IFFALSE 3240
3216: GO 3218
3218: DISABLE
// begin AddComUnload ( ASD2 ) ;
3219: LD_EXP 64
3223: PPUSH
3224: CALL_OW 219
// AddComMoveToArea ( ASD2 , TRANSPORT ) ;
3228: LD_EXP 64
3232: PPUSH
3233: LD_INT 5
3235: PPUSH
3236: CALL_OW 173
// end ;
3240: END
// every 0 0$1 trigger IsInArea ( ASD2 , TRANSPORT ) do
3241: LD_EXP 64
3245: PPUSH
3246: LD_INT 5
3248: PPUSH
3249: CALL_OW 308
3253: IFFALSE 3267
3255: GO 3257
3257: DISABLE
// begin removeunit ( ASD2 ) ;
3258: LD_EXP 64
3262: PPUSH
3263: CALL_OW 64
// end ; end_of_file
3267: END
// export ASD3 , ASD4 , ASD5 ; export function wsparcie3 ; begin
3268: LD_INT 0
3270: PPUSH
// ; vc_chassis = 2 ;
3271: LD_ADDR_OWVAR 37
3275: PUSH
3276: LD_INT 2
3278: ST_TO_ADDR
// vc_engine = engine_combustion ;
3279: LD_ADDR_OWVAR 39
3283: PUSH
3284: LD_INT 1
3286: ST_TO_ADDR
// vc_control = control_Computer ;
3287: LD_ADDR_OWVAR 38
3291: PUSH
3292: LD_INT 3
3294: ST_TO_ADDR
// vc_weapon = 12 ;
3295: LD_ADDR_OWVAR 40
3299: PUSH
3300: LD_INT 12
3302: ST_TO_ADDR
// uc_side = 1 ;
3303: LD_ADDR_OWVAR 20
3307: PUSH
3308: LD_INT 1
3310: ST_TO_ADDR
// uc_nation = 1 ;
3311: LD_ADDR_OWVAR 21
3315: PUSH
3316: LD_INT 1
3318: ST_TO_ADDR
// ASD3 = CreateVehicle ;
3319: LD_ADDR_EXP 65
3323: PUSH
3324: CALL_OW 45
3328: ST_TO_ADDR
// ASD4 = CreateVehicle ;
3329: LD_ADDR_EXP 66
3333: PUSH
3334: CALL_OW 45
3338: ST_TO_ADDR
// ASD5 = CreateVehicle ;
3339: LD_ADDR_EXP 67
3343: PUSH
3344: CALL_OW 45
3348: ST_TO_ADDR
// setcargo ( ASD3 , mat_cans , 100 ) ;
3349: LD_EXP 65
3353: PPUSH
3354: LD_INT 1
3356: PPUSH
3357: LD_INT 100
3359: PPUSH
3360: CALL_OW 290
// setcargo ( ASD4 , mat_oil , 100 ) ;
3364: LD_EXP 66
3368: PPUSH
3369: LD_INT 2
3371: PPUSH
3372: LD_INT 100
3374: PPUSH
3375: CALL_OW 290
// setcargo ( ASD5 , mat_cans , 100 ) ;
3379: LD_EXP 67
3383: PPUSH
3384: LD_INT 1
3386: PPUSH
3387: LD_INT 100
3389: PPUSH
3390: CALL_OW 290
// PlaceUnitArea ( ASD3 , WSPARCIE , false ) ;
3394: LD_EXP 65
3398: PPUSH
3399: LD_INT 3
3401: PPUSH
3402: LD_INT 0
3404: PPUSH
3405: CALL_OW 49
// PlaceUnitArea ( ASD4 , WSPARCIE , false ) ;
3409: LD_EXP 66
3413: PPUSH
3414: LD_INT 3
3416: PPUSH
3417: LD_INT 0
3419: PPUSH
3420: CALL_OW 49
// PlaceUnitArea ( ASD5 , WSPARCIE , false ) ;
3424: LD_EXP 67
3428: PPUSH
3429: LD_INT 3
3431: PPUSH
3432: LD_INT 0
3434: PPUSH
3435: CALL_OW 49
// AddComMoveToArea ( ASD3 , wypuszczenie ) ;
3439: LD_EXP 65
3443: PPUSH
3444: LD_INT 6
3446: PPUSH
3447: CALL_OW 173
// AddComMoveToArea ( ASD4 , wypuszczenie ) ;
3451: LD_EXP 66
3455: PPUSH
3456: LD_INT 6
3458: PPUSH
3459: CALL_OW 173
// AddComMoveToArea ( ASD5 , wypuszczenie ) ;
3463: LD_EXP 67
3467: PPUSH
3468: LD_INT 6
3470: PPUSH
3471: CALL_OW 173
// end ;
3475: LD_VAR 0 1
3479: RET
// every 0 0$01 trigger IsInArea ( ASD3 , wypuszczenie ) do
3480: LD_EXP 65
3484: PPUSH
3485: LD_INT 6
3487: PPUSH
3488: CALL_OW 308
3492: IFFALSE 3518
3494: GO 3496
3496: DISABLE
// begin AddComUnload ( ASD3 ) ;
3497: LD_EXP 65
3501: PPUSH
3502: CALL_OW 219
// AddComMoveToArea ( ASD3 , TRANSPORT ) ;
3506: LD_EXP 65
3510: PPUSH
3511: LD_INT 5
3513: PPUSH
3514: CALL_OW 173
// end ;
3518: END
// every 0 0$1 trigger IsInArea ( ASD3 , TRANSPORT ) do
3519: LD_EXP 65
3523: PPUSH
3524: LD_INT 5
3526: PPUSH
3527: CALL_OW 308
3531: IFFALSE 3545
3533: GO 3535
3535: DISABLE
// begin removeunit ( ASD3 ) ;
3536: LD_EXP 65
3540: PPUSH
3541: CALL_OW 64
// end ;
3545: END
// every 0 0$01 trigger IsInArea ( ASD4 , wypuszczenie ) do
3546: LD_EXP 66
3550: PPUSH
3551: LD_INT 6
3553: PPUSH
3554: CALL_OW 308
3558: IFFALSE 3584
3560: GO 3562
3562: DISABLE
// begin AddComUnload ( ASD4 ) ;
3563: LD_EXP 66
3567: PPUSH
3568: CALL_OW 219
// AddComMoveToArea ( ASD4 , TRANSPORT ) ;
3572: LD_EXP 66
3576: PPUSH
3577: LD_INT 5
3579: PPUSH
3580: CALL_OW 173
// end ;
3584: END
// every 0 0$1 trigger IsInArea ( ASD4 , TRANSPORT ) do
3585: LD_EXP 66
3589: PPUSH
3590: LD_INT 5
3592: PPUSH
3593: CALL_OW 308
3597: IFFALSE 3611
3599: GO 3601
3601: DISABLE
// begin removeunit ( ASD4 ) ;
3602: LD_EXP 66
3606: PPUSH
3607: CALL_OW 64
// end ;
3611: END
// every 0 0$01 trigger IsInArea ( ASD5 , wypuszczenie ) do
3612: LD_EXP 67
3616: PPUSH
3617: LD_INT 6
3619: PPUSH
3620: CALL_OW 308
3624: IFFALSE 3650
3626: GO 3628
3628: DISABLE
// begin AddComUnload ( ASD5 ) ;
3629: LD_EXP 67
3633: PPUSH
3634: CALL_OW 219
// AddComMoveToArea ( ASD5 , TRANSPORT ) ;
3638: LD_EXP 67
3642: PPUSH
3643: LD_INT 5
3645: PPUSH
3646: CALL_OW 173
// end ;
3650: END
// every 0 0$1 trigger IsInArea ( ASD5 , TRANSPORT ) do
3651: LD_EXP 67
3655: PPUSH
3656: LD_INT 5
3658: PPUSH
3659: CALL_OW 308
3663: IFFALSE 3677
3665: GO 3667
3667: DISABLE
// begin removeunit ( ASD5 ) ;
3668: LD_EXP 67
3672: PPUSH
3673: CALL_OW 64
// end ; end_of_file
3677: END
// export ASD6 , ASD7 , ASD8 ; export function wsparcie4 ; begin
3678: LD_INT 0
3680: PPUSH
// ; vc_chassis = 2 ;
3681: LD_ADDR_OWVAR 37
3685: PUSH
3686: LD_INT 2
3688: ST_TO_ADDR
// vc_engine = engine_combustion ;
3689: LD_ADDR_OWVAR 39
3693: PUSH
3694: LD_INT 1
3696: ST_TO_ADDR
// vc_control = control_Computer ;
3697: LD_ADDR_OWVAR 38
3701: PUSH
3702: LD_INT 3
3704: ST_TO_ADDR
// vc_weapon = 12 ;
3705: LD_ADDR_OWVAR 40
3709: PUSH
3710: LD_INT 12
3712: ST_TO_ADDR
// uc_side = 1 ;
3713: LD_ADDR_OWVAR 20
3717: PUSH
3718: LD_INT 1
3720: ST_TO_ADDR
// uc_nation = 1 ;
3721: LD_ADDR_OWVAR 21
3725: PUSH
3726: LD_INT 1
3728: ST_TO_ADDR
// ASD6 = CreateVehicle ;
3729: LD_ADDR_EXP 68
3733: PUSH
3734: CALL_OW 45
3738: ST_TO_ADDR
// ASD7 = CreateVehicle ;
3739: LD_ADDR_EXP 69
3743: PUSH
3744: CALL_OW 45
3748: ST_TO_ADDR
// ASD8 = CreateVehicle ;
3749: LD_ADDR_EXP 70
3753: PUSH
3754: CALL_OW 45
3758: ST_TO_ADDR
// setcargo ( ASD6 , mat_oil , 100 ) ;
3759: LD_EXP 68
3763: PPUSH
3764: LD_INT 2
3766: PPUSH
3767: LD_INT 100
3769: PPUSH
3770: CALL_OW 290
// setcargo ( ASD7 , mat_oil , 100 ) ;
3774: LD_EXP 69
3778: PPUSH
3779: LD_INT 2
3781: PPUSH
3782: LD_INT 100
3784: PPUSH
3785: CALL_OW 290
// setcargo ( ASD8 , mat_cans , 100 ) ;
3789: LD_EXP 70
3793: PPUSH
3794: LD_INT 1
3796: PPUSH
3797: LD_INT 100
3799: PPUSH
3800: CALL_OW 290
// PlaceUnitArea ( ASD7 , WSPARCIE , false ) ;
3804: LD_EXP 69
3808: PPUSH
3809: LD_INT 3
3811: PPUSH
3812: LD_INT 0
3814: PPUSH
3815: CALL_OW 49
// PlaceUnitArea ( ASD6 , WSPARCIE , false ) ;
3819: LD_EXP 68
3823: PPUSH
3824: LD_INT 3
3826: PPUSH
3827: LD_INT 0
3829: PPUSH
3830: CALL_OW 49
// PlaceUnitArea ( ASD8 , WSPARCIE , false ) ;
3834: LD_EXP 70
3838: PPUSH
3839: LD_INT 3
3841: PPUSH
3842: LD_INT 0
3844: PPUSH
3845: CALL_OW 49
// AddComMoveToArea ( ASD6 , wypuszczenie ) ;
3849: LD_EXP 68
3853: PPUSH
3854: LD_INT 6
3856: PPUSH
3857: CALL_OW 173
// AddComMoveToArea ( ASD7 , wypuszczenie ) ;
3861: LD_EXP 69
3865: PPUSH
3866: LD_INT 6
3868: PPUSH
3869: CALL_OW 173
// AddComMoveToArea ( ASD8 , wypuszczenie ) ;
3873: LD_EXP 70
3877: PPUSH
3878: LD_INT 6
3880: PPUSH
3881: CALL_OW 173
// end ;
3885: LD_VAR 0 1
3889: RET
// every 0 0$01 trigger IsInArea ( ASD6 , wypuszczenie ) do
3890: LD_EXP 68
3894: PPUSH
3895: LD_INT 6
3897: PPUSH
3898: CALL_OW 308
3902: IFFALSE 3928
3904: GO 3906
3906: DISABLE
// begin AddComUnload ( ASD6 ) ;
3907: LD_EXP 68
3911: PPUSH
3912: CALL_OW 219
// AddComMoveToArea ( ASD6 , TRANSPORT ) ;
3916: LD_EXP 68
3920: PPUSH
3921: LD_INT 5
3923: PPUSH
3924: CALL_OW 173
// end ;
3928: END
// every 0 0$1 trigger IsInArea ( ASD6 , TRANSPORT ) do
3929: LD_EXP 68
3933: PPUSH
3934: LD_INT 5
3936: PPUSH
3937: CALL_OW 308
3941: IFFALSE 3955
3943: GO 3945
3945: DISABLE
// begin removeunit ( ASD6 ) ;
3946: LD_EXP 68
3950: PPUSH
3951: CALL_OW 64
// end ;
3955: END
// every 0 0$01 trigger IsInArea ( ASD7 , wypuszczenie ) do
3956: LD_EXP 69
3960: PPUSH
3961: LD_INT 6
3963: PPUSH
3964: CALL_OW 308
3968: IFFALSE 3994
3970: GO 3972
3972: DISABLE
// begin AddComUnload ( ASD7 ) ;
3973: LD_EXP 69
3977: PPUSH
3978: CALL_OW 219
// AddComMoveToArea ( ASD7 , TRANSPORT ) ;
3982: LD_EXP 69
3986: PPUSH
3987: LD_INT 5
3989: PPUSH
3990: CALL_OW 173
// end ;
3994: END
// every 0 0$1 trigger IsInArea ( ASD7 , TRANSPORT ) do
3995: LD_EXP 69
3999: PPUSH
4000: LD_INT 5
4002: PPUSH
4003: CALL_OW 308
4007: IFFALSE 4021
4009: GO 4011
4011: DISABLE
// begin removeunit ( ASD7 ) ;
4012: LD_EXP 69
4016: PPUSH
4017: CALL_OW 64
// end ;
4021: END
// every 0 0$01 trigger IsInArea ( ASD8 , wypuszczenie ) do
4022: LD_EXP 70
4026: PPUSH
4027: LD_INT 6
4029: PPUSH
4030: CALL_OW 308
4034: IFFALSE 4060
4036: GO 4038
4038: DISABLE
// begin AddComUnload ( ASD8 ) ;
4039: LD_EXP 70
4043: PPUSH
4044: CALL_OW 219
// AddComMoveToArea ( ASD8 , TRANSPORT ) ;
4048: LD_EXP 70
4052: PPUSH
4053: LD_INT 5
4055: PPUSH
4056: CALL_OW 173
// end ;
4060: END
// every 0 0$1 trigger IsInArea ( ASD8 , TRANSPORT ) do
4061: LD_EXP 70
4065: PPUSH
4066: LD_INT 5
4068: PPUSH
4069: CALL_OW 308
4073: IFFALSE 4087
4075: GO 4077
4077: DISABLE
// begin removeunit ( ASD8 ) ;
4078: LD_EXP 70
4082: PPUSH
4083: CALL_OW 64
// end ; end_of_file
4087: END
// every 0 0$1 trigger IsDead ( OWChyba ) do
4088: LD_EXP 19
4092: PPUSH
4093: CALL_OW 301
4097: IFFALSE 4109
4099: GO 4101
4101: DISABLE
// begin YouLost ( ded ) ;
4102: LD_STRING ded
4104: PPUSH
4105: CALL_OW 104
// end ;
4109: END
// on Contact ( side1 , side2 ) do begin if side1 = 1 and side2 = 4 then
4110: LD_VAR 0 1
4114: PUSH
4115: LD_INT 1
4117: EQUAL
4118: PUSH
4119: LD_VAR 0 2
4123: PUSH
4124: LD_INT 4
4126: EQUAL
4127: AND
4128: IFFALSE 4137
// begin YouLost ( fire ) ;
4130: LD_STRING fire
4132: PPUSH
4133: CALL_OW 104
// end ; end ;
4137: PPOPN 2
4139: END
// every 0 0$1 trigger FilterAllUnits ( [ [ f_side , 4 ] , [ f_type , unit_human ] ] ) < 11 do
4140: LD_INT 22
4142: PUSH
4143: LD_INT 4
4145: PUSH
4146: EMPTY
4147: LIST
4148: LIST
4149: PUSH
4150: LD_INT 21
4152: PUSH
4153: LD_INT 1
4155: PUSH
4156: EMPTY
4157: LIST
4158: LIST
4159: PUSH
4160: EMPTY
4161: LIST
4162: LIST
4163: PPUSH
4164: CALL_OW 69
4168: PUSH
4169: LD_INT 11
4171: LESS
4172: IFFALSE 4184
4174: GO 4176
4176: DISABLE
// begin YouLost ( ludzie ) ;
4177: LD_STRING ludzie
4179: PPUSH
4180: CALL_OW 104
// end ; end_of_file
4184: END
// export function medale ; begin
4185: LD_INT 0
4187: PPUSH
// if FilterAllUnits ( [ [ f_side , 4 ] , [ f_type , unit_vehicle ] , [ f_weapon , 7 ] ] ) >= 1 or FilterAllUnits ( [ [ f_side , 4 ] , [ f_type , unit_building ] , [ f_btype , b_bunker ] , [ f_weapon , 7 ] ] ) >= 1 then
4188: LD_INT 22
4190: PUSH
4191: LD_INT 4
4193: PUSH
4194: EMPTY
4195: LIST
4196: LIST
4197: PUSH
4198: LD_INT 21
4200: PUSH
4201: LD_INT 2
4203: PUSH
4204: EMPTY
4205: LIST
4206: LIST
4207: PUSH
4208: LD_INT 34
4210: PUSH
4211: LD_INT 7
4213: PUSH
4214: EMPTY
4215: LIST
4216: LIST
4217: PUSH
4218: EMPTY
4219: LIST
4220: LIST
4221: LIST
4222: PPUSH
4223: CALL_OW 69
4227: PUSH
4228: LD_INT 1
4230: GREATEREQUAL
4231: PUSH
4232: LD_INT 22
4234: PUSH
4235: LD_INT 4
4237: PUSH
4238: EMPTY
4239: LIST
4240: LIST
4241: PUSH
4242: LD_INT 21
4244: PUSH
4245: LD_INT 3
4247: PUSH
4248: EMPTY
4249: LIST
4250: LIST
4251: PUSH
4252: LD_INT 30
4254: PUSH
4255: LD_INT 32
4257: PUSH
4258: EMPTY
4259: LIST
4260: LIST
4261: PUSH
4262: LD_INT 34
4264: PUSH
4265: LD_INT 7
4267: PUSH
4268: EMPTY
4269: LIST
4270: LIST
4271: PUSH
4272: EMPTY
4273: LIST
4274: LIST
4275: LIST
4276: LIST
4277: PPUSH
4278: CALL_OW 69
4282: PUSH
4283: LD_INT 1
4285: GREATEREQUAL
4286: OR
4287: IFFALSE 4301
// begin AddMedal ( med1 , 1 ) ;
4289: LD_STRING med1
4291: PPUSH
4292: LD_INT 1
4294: PPUSH
4295: CALL_OW 101
// end else
4299: GO 4312
// begin AddMedal ( med1 , - 1 ) ;
4301: LD_STRING med1
4303: PPUSH
4304: LD_INT 1
4306: NEG
4307: PPUSH
4308: CALL_OW 101
// end ; if FilterAllUnits ( [ [ f_side , 4 ] , [ f_type , unit_human ] ] ) > 13 then
4312: LD_INT 22
4314: PUSH
4315: LD_INT 4
4317: PUSH
4318: EMPTY
4319: LIST
4320: LIST
4321: PUSH
4322: LD_INT 21
4324: PUSH
4325: LD_INT 1
4327: PUSH
4328: EMPTY
4329: LIST
4330: LIST
4331: PUSH
4332: EMPTY
4333: LIST
4334: LIST
4335: PPUSH
4336: CALL_OW 69
4340: PUSH
4341: LD_INT 13
4343: GREATER
4344: IFFALSE 4358
// begin AddMedal ( med2 , 1 ) ;
4346: LD_STRING med2
4348: PPUSH
4349: LD_INT 1
4351: PPUSH
4352: CALL_OW 101
// end else
4356: GO 4369
// begin AddMedal ( med2 , - 1 ) ;
4358: LD_STRING med2
4360: PPUSH
4361: LD_INT 1
4363: NEG
4364: PPUSH
4365: CALL_OW 101
// end ; AddMedal ( med3 , 1 ) ;
4369: LD_STRING med3
4371: PPUSH
4372: LD_INT 1
4374: PPUSH
4375: CALL_OW 101
// GiveMedals ( MAIN ) ;
4379: LD_STRING MAIN
4381: PPUSH
4382: CALL_OW 102
// end ; end_of_file
4386: LD_VAR 0 1
4390: RET
// export function WOWOWO ; var i , atakujacy , broniacy ; begin
4391: LD_INT 0
4393: PPUSH
4394: PPUSH
4395: PPUSH
4396: PPUSH
// broniacy = FilterAllUnits ( [ f_side , 4 ] ) ;
4397: LD_ADDR_VAR 0 4
4401: PUSH
4402: LD_INT 22
4404: PUSH
4405: LD_INT 4
4407: PUSH
4408: EMPTY
4409: LIST
4410: LIST
4411: PPUSH
4412: CALL_OW 69
4416: ST_TO_ADDR
// atakujacy = FilterAllUnits ( [ f_side , 6 ] ) ;
4417: LD_ADDR_VAR 0 3
4421: PUSH
4422: LD_INT 22
4424: PUSH
4425: LD_INT 6
4427: PUSH
4428: EMPTY
4429: LIST
4430: LIST
4431: PPUSH
4432: CALL_OW 69
4436: ST_TO_ADDR
// for i in atakujacy do
4437: LD_ADDR_VAR 0 2
4441: PUSH
4442: LD_VAR 0 3
4446: PUSH
4447: FOR_IN
4448: IFFALSE 4476
// begin ComAttackUnit ( i , NearestUnitToUnit ( broniacy , i ) ) ;
4450: LD_VAR 0 2
4454: PPUSH
4455: LD_VAR 0 4
4459: PPUSH
4460: LD_VAR 0 2
4464: PPUSH
4465: CALL_OW 74
4469: PPUSH
4470: CALL_OW 115
// end ;
4474: GO 4447
4476: POP
4477: POP
// end ;
4478: LD_VAR 0 1
4482: RET
// every 0 0$2 do
4483: GO 4485
4485: DISABLE
// begin WOWOWO ;
4486: CALL 4391 0 0
// enable ;
4490: ENABLE
// end ; end_of_file
4491: END
// every 0 0$1 do
4492: GO 4494
4494: DISABLE
// begin if Difficulty = 1 then
4495: LD_OWVAR 67
4499: PUSH
4500: LD_INT 1
4502: EQUAL
4503: IFFALSE 4505
// begin end ; if Difficulty = 2 then
4505: LD_OWVAR 67
4509: PUSH
4510: LD_INT 2
4512: EQUAL
4513: IFFALSE 4554
// begin SetTech ( 57 , 6 , state_Researched ) ;
4515: LD_INT 57
4517: PPUSH
4518: LD_INT 6
4520: PPUSH
4521: LD_INT 2
4523: PPUSH
4524: CALL_OW 322
// SetTech ( 48 , 6 , state_Researched ) ;
4528: LD_INT 48
4530: PPUSH
4531: LD_INT 6
4533: PPUSH
4534: LD_INT 2
4536: PPUSH
4537: CALL_OW 322
// SetTech ( 51 , 6 , state_Researched ) ;
4541: LD_INT 51
4543: PPUSH
4544: LD_INT 6
4546: PPUSH
4547: LD_INT 2
4549: PPUSH
4550: CALL_OW 322
// end ; if Difficulty = 3 then
4554: LD_OWVAR 67
4558: PUSH
4559: LD_INT 3
4561: EQUAL
4562: IFFALSE 4629
// begin SetTech ( 57 , 6 , state_Researched ) ;
4564: LD_INT 57
4566: PPUSH
4567: LD_INT 6
4569: PPUSH
4570: LD_INT 2
4572: PPUSH
4573: CALL_OW 322
// SetTech ( 48 , 6 , state_Researched ) ;
4577: LD_INT 48
4579: PPUSH
4580: LD_INT 6
4582: PPUSH
4583: LD_INT 2
4585: PPUSH
4586: CALL_OW 322
// SetTech ( 51 , 6 , state_Researched ) ;
4590: LD_INT 51
4592: PPUSH
4593: LD_INT 6
4595: PPUSH
4596: LD_INT 2
4598: PPUSH
4599: CALL_OW 322
// SetTech ( 49 , 6 , state_Researched ) ;
4603: LD_INT 49
4605: PPUSH
4606: LD_INT 6
4608: PPUSH
4609: LD_INT 2
4611: PPUSH
4612: CALL_OW 322
// SetTech ( 52 , 6 , state_Researched ) ;
4616: LD_INT 52
4618: PPUSH
4619: LD_INT 6
4621: PPUSH
4622: LD_INT 2
4624: PPUSH
4625: CALL_OW 322
// end ; end ; end_of_file
4629: END
// export function LoadVehicles ; var tab , i , p , veh , filter ; begin
4630: LD_INT 0
4632: PPUSH
4633: PPUSH
4634: PPUSH
4635: PPUSH
4636: PPUSH
4637: PPUSH
// uc_side := 4 ;
4638: LD_ADDR_OWVAR 20
4642: PUSH
4643: LD_INT 4
4645: ST_TO_ADDR
// tab := LoadVariable ( unit_vehs , [ ] ) ;
4646: LD_ADDR_VAR 0 2
4650: PUSH
4651: LD_STRING unit_vehs
4653: PPUSH
4654: EMPTY
4655: PPUSH
4656: CALL_OW 30
4660: ST_TO_ADDR
// i := 1 ;
4661: LD_ADDR_VAR 0 3
4665: PUSH
4666: LD_INT 1
4668: ST_TO_ADDR
// p := 1 ;
4669: LD_ADDR_VAR 0 4
4673: PUSH
4674: LD_INT 1
4676: ST_TO_ADDR
// if tab > 0 then
4677: LD_VAR 0 2
4681: PUSH
4682: LD_INT 0
4684: GREATER
4685: IFFALSE 4830
// while ( i <= tab ) do
4687: LD_VAR 0 3
4691: PUSH
4692: LD_VAR 0 2
4696: LESSEQUAL
4697: IFFALSE 4830
// begin vc_chassis := tab [ i ] ;
4699: LD_ADDR_OWVAR 37
4703: PUSH
4704: LD_VAR 0 2
4708: PUSH
4709: LD_VAR 0 3
4713: ARRAY
4714: ST_TO_ADDR
// vc_engine := tab [ i + 1 ] ;
4715: LD_ADDR_OWVAR 39
4719: PUSH
4720: LD_VAR 0 2
4724: PUSH
4725: LD_VAR 0 3
4729: PUSH
4730: LD_INT 1
4732: PLUS
4733: ARRAY
4734: ST_TO_ADDR
// vc_control := tab [ i + 2 ] ;
4735: LD_ADDR_OWVAR 38
4739: PUSH
4740: LD_VAR 0 2
4744: PUSH
4745: LD_VAR 0 3
4749: PUSH
4750: LD_INT 2
4752: PLUS
4753: ARRAY
4754: ST_TO_ADDR
// vc_weapon := tab [ i + 3 ] ;
4755: LD_ADDR_OWVAR 40
4759: PUSH
4760: LD_VAR 0 2
4764: PUSH
4765: LD_VAR 0 3
4769: PUSH
4770: LD_INT 3
4772: PLUS
4773: ARRAY
4774: ST_TO_ADDR
// veh := CreateVehicle ;
4775: LD_ADDR_VAR 0 5
4779: PUSH
4780: CALL_OW 45
4784: ST_TO_ADDR
// PlaceUnitArea ( veh , ATAK_POLUDNIE , false ) ;
4785: LD_VAR 0 5
4789: PPUSH
4790: LD_INT 2
4792: PPUSH
4793: LD_INT 0
4795: PPUSH
4796: CALL_OW 49
// p := p + 1 ;
4800: LD_ADDR_VAR 0 4
4804: PUSH
4805: LD_VAR 0 4
4809: PUSH
4810: LD_INT 1
4812: PLUS
4813: ST_TO_ADDR
// i := i + 4 ;
4814: LD_ADDR_VAR 0 3
4818: PUSH
4819: LD_VAR 0 3
4823: PUSH
4824: LD_INT 4
4826: PLUS
4827: ST_TO_ADDR
// end ;
4828: GO 4687
// end ;
4830: LD_VAR 0 1
4834: RET
